inherited FrmRel_ExtratoRepresentante: TFrmRel_ExtratoRepresentante
  Left = 233
  Top = 84
  Caption = 'Extrato de Representante'
  ClientHeight = 553
  ClientWidth = 569
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Width = 569
    Height = 380
    object Label15: TLabel
      Left = 11
      Top = 11
      Width = 77
      Height = 14
      Caption = 'Repres. Inicial'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object BtnRepresentante: TSpeedButton
      Left = 139
      Top = 7
      Width = 23
      Height = 22
      Enabled = False
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = BtnRepresentanteClick
    end
    object Label1: TLabel
      Left = 17
      Top = 36
      Width = 71
      Height = 14
      Caption = 'Repres. Final'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lb_ir: TLabel
      Left = 142
      Top = 330
      Width = 25
      Height = 14
      Caption = '% I.R'
    end
    object btnReprFim: TSpeedButton
      Left = 139
      Top = 32
      Width = 23
      Height = 22
      Enabled = False
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = btnReprFimClick
    end
    object ckStatus: TRadioGroup
      Left = 8
      Top = 58
      Width = 236
      Height = 29
      Columns = 3
      Ctl3D = True
      ItemIndex = 0
      Items.Strings = (
        'Ativos'
        'Inativos'
        'Todos')
      ParentCtl3D = False
      TabOrder = 2
      OnClick = ckStatusClick
      OnExit = ckStatusClick
    end
    object GroupBox1: TGroupBox
      Left = 206
      Top = 221
      Width = 189
      Height = 77
      Caption = 'Per'#237'odo'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 7
      object Label2: TLabel
        Left = 20
        Top = 16
        Width = 54
        Height = 14
        Caption = 'Iniciar em'
        Font.Charset = ANSI_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label3: TLabel
        Left = 6
        Top = 52
        Width = 68
        Height = 14
        Caption = 'Encerrar em'
      end
      object dtiniciar: TDateEdit
        Left = 81
        Top = 12
        Width = 100
        Height = 21
        Ctl3D = False
        NumGlyphs = 2
        ParentCtl3D = False
        TabOrder = 0
        OnKeyDown = dtiniciarKeyDown
      end
      object dtencerrar: TDateEdit
        Left = 81
        Top = 48
        Width = 100
        Height = 21
        Ctl3D = False
        NumGlyphs = 2
        ParentCtl3D = False
        TabOrder = 1
        OnKeyDown = dtencerrarKeyDown
      end
    end
    object EdtRepresentante: TEdit
      Left = 92
      Top = 7
      Width = 41
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      MaxLength = 3
      ParentFont = False
      TabOrder = 0
      OnEnter = EdtRepresentanteEnter
      OnExit = EdtRepresentanteExit
      OnKeyDown = EdtRepresentanteKeyDown
    end
    object PnlRepresentante: TPanel
      Left = 171
      Top = 7
      Width = 391
      Height = 22
      Alignment = taLeftJustify
      BevelInner = bvLowered
      Color = 14081504
      TabOrder = 8
    end
    object p_tipo: TRadioGroup
      Left = 7
      Top = 221
      Width = 194
      Height = 77
      Caption = 'Status da Comiss'#227'o'
      Columns = 2
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ItemIndex = 3
      Items.Strings = (
        'Liberada'
        'N'#227'o Liberada'
        'Paga'
        'Geral')
      ParentFont = False
      TabOrder = 6
    end
    object p_frete: TRadioGroup
      Left = 400
      Top = 221
      Width = 163
      Height = 37
      Caption = 'Imprime Frete no Per'#237'odo?'
      Columns = 2
      ItemIndex = 1
      Items.Strings = (
        'Sim'
        'N'#227'o')
      TabOrder = 9
    end
    object p_valores: TRadioGroup
      Left = 400
      Top = 261
      Width = 163
      Height = 37
      Caption = 'Imprimir com valores?'
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        'Sim'
        'N'#227'o')
      TabOrder = 10
    end
    object Panel7: TPanel
      Left = 7
      Top = 354
      Width = 556
      Height = 24
      BevelInner = bvRaised
      BevelOuter = bvLowered
      BorderWidth = 2
      TabOrder = 13
      object bp: TGauge
        Left = 6
        Top = 5
        Width = 544
        Height = 14
        BorderStyle = bsNone
        ForeColor = clNavy
        Progress = 0
        Visible = False
      end
    end
    object ckRepr: TCheckListBox
      Left = 8
      Top = 89
      Width = 553
      Height = 129
      HelpType = htKeyword
      BevelKind = bkFlat
      BorderStyle = bsNone
      Columns = 2
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Courier New'
      Font.Style = [fsBold]
      ItemHeight = 14
      ParentFont = False
      TabOrder = 5
      OnExit = ckReprExit
    end
    object ed_RepFim: TEdit
      Left = 92
      Top = 32
      Width = 41
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      MaxLength = 3
      ParentFont = False
      TabOrder = 1
      OnEnter = ed_RepFimEnter
      OnExit = ed_RepFimExit
      OnKeyDown = ed_RepFimKeyDown
    end
    object pnlRepFim: TPanel
      Left = 171
      Top = 32
      Width = 391
      Height = 22
      Alignment = taLeftJustify
      BevelInner = bvLowered
      Color = 14081504
      TabOrder = 14
    end
    object ckTodos: TCheckBox
      Left = 443
      Top = 69
      Width = 121
      Height = 17
      TabStop = False
      Caption = 'Selecionar Todos'
      Checked = True
      State = cbChecked
      TabOrder = 4
      OnClick = ckTodosClick
    end
    object ckQuebra: TCheckBox
      Left = 379
      Top = 328
      Width = 188
      Height = 17
      Caption = 'Quebrar representante por pg'
      TabOrder = 12
    end
    object bRPA: TBitBtn
      Left = 9
      Top = 325
      Width = 123
      Height = 24
      Caption = 'Tabela de RPA'
      TabOrder = 15
      Visible = False
      OnClick = bRPAClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333FFFFFFFFFFFFFFF000000000000000077777777777777770FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07FFFFFFFFFFFFFF70CCCCCCCCCCCCCC07777777777777777088CCCCCCCCC
        C8807FF7777777777FF700000000000000007777777777777777333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
    end
    object ed_ir: TCurrencyEdit
      Left = 174
      Top = 327
      Width = 61
      Height = 21
      AutoSize = False
      Ctl3D = False
      DisplayFormat = '0.00 %;- 0.00 %'
      ParentCtl3D = False
      TabOrder = 16
    end
    object ckbGerar: TCheckBox
      Left = 264
      Top = 69
      Width = 161
      Height = 17
      Caption = 'Gerar arquivo para envio'
      TabOrder = 3
      Visible = False
    end
    object ckDebitos: TCheckBox
      Left = 8
      Top = 304
      Width = 121
      Height = 17
      Caption = 'Somente d'#233'bitos'
      TabOrder = 11
    end
  end
  inherited Panel2: TPanel
    Top = 486
    Width = 569
    inherited bimprimir: TFlatButton
      OnClick = bimprimirClick
    end
    inherited btncancelar: TFlatButton
      Left = 230
      OnClick = btncancelarClick
    end
    inherited btnfechar: TFlatButton
      Left = 448
    end
  end
  inherited sb: TStatusBar
    Top = 534
    Width = 569
  end
  inherited Panel3: TPanel
    Width = 569
    inherited ListaEmp: TCheckListBox
      Width = 553
    end
  end
  object RLReport1: TRLReport [4]
    Left = 559
    Top = 63
    Width = 794
    Height = 1123
    DataSource = dsEnvio
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Courier New'
    Font.Style = []
    Visible = False
    object RLBand2: TRLBand
      Left = 38
      Top = 169
      Width = 718
      Height = 24
      BandType = btColumnHeader
      Borders.Sides = sdCustom
      Borders.DrawLeft = False
      Borders.DrawTop = False
      Borders.DrawRight = False
      Borders.DrawBottom = True
      Borders.FixedBottom = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -9
      Font.Name = 'Courier New'
      Font.Style = []
      ParentFont = False
      object RLLabel2: TRLLabel
        Left = 3
        Top = 5
        Width = 20
        Height = 12
        Caption = 'Seq'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object RLLabel3: TRLLabel
        Left = 251
        Top = 5
        Width = 55
        Height = 12
        Caption = 'Historico2'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object RLLabel4: TRLLabel
        Left = 397
        Top = 5
        Width = 20
        Height = 12
        Caption = 'Ped'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object RLLabel5: TRLLabel
        Left = 455
        Top = 5
        Width = 40
        Height = 12
        Caption = 'Ped.Rep'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object RLLabel6: TRLLabel
        Left = 511
        Top = 5
        Width = 15
        Height = 12
        Caption = 'PM'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object RLLabel7: TRLLabel
        Left = 531
        Top = 5
        Width = 35
        Height = 12
        Alignment = taRightJustify
        Caption = '(%)Com'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object RLLabel8: TRLLabel
        Left = 590
        Top = 5
        Width = 30
        Height = 12
        Alignment = taRightJustify
        Caption = 'B.Cal'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object RLLabel11: TRLLabel
        Left = 26
        Top = 5
        Width = 20
        Height = 12
        Caption = 'Emp'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object RLLabel12: TRLLabel
        Left = 51
        Top = 5
        Width = 25
        Height = 12
        Caption = 'Data'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object RLLabel13: TRLLabel
        Left = 111
        Top = 5
        Width = 15
        Height = 12
        Caption = 'Tp'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object RLLabel14: TRLLabel
        Left = 128
        Top = 5
        Width = 50
        Height = 12
        Caption = 'Historico'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object RLLabel15: TRLLabel
        Left = 645
        Top = 5
        Width = 30
        Height = 12
        Alignment = taRightJustify
        Caption = 'Valor'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object RLLabel16: TRLLabel
        Left = 682
        Top = 5
        Width = 35
        Height = 12
        Caption = 'Status'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = [fsBold]
        ParentFont = False
      end
    end
    object RLBand3: TRLBand
      Left = 38
      Top = 193
      Width = 718
      Height = 27
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Courier New'
      Font.Style = []
      ParentFont = False
      object dbtSeq: TRLDBText
        Left = 3
        Top = 8
        Width = 20
        Height = 12
        DataField = 'Seq'
        DataSource = dsEnvio
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object dbtEmp: TRLDBText
        Left = 26
        Top = 8
        Width = 20
        Height = 12
        DataField = 'Emp'
        DataSource = dsEnvio
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object dbtData: TRLDBText
        Left = 51
        Top = 8
        Width = 25
        Height = 12
        DataField = 'Data'
        DataSource = dsEnvio
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object dbtTp: TRLDBText
        Left = 111
        Top = 8
        Width = 15
        Height = 12
        DataField = 'Tp'
        DataSource = dsEnvio
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object dbtHistorico: TRLDBText
        Left = 128
        Top = 8
        Width = 25
        Height = 12
        DataField = 'Hist'
        DataSource = dsEnvio
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object dbtHist2: TRLDBText
        Left = 251
        Top = 8
        Width = 30
        Height = 12
        DataField = 'Hist2'
        DataSource = dsEnvio
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object dbtPed: TRLDBText
        Left = 396
        Top = 8
        Width = 20
        Height = 12
        DataField = 'Ped'
        DataSource = dsEnvio
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object dbtPedRep: TRLDBText
        Left = 455
        Top = 8
        Width = 35
        Height = 12
        DataField = 'PedRep'
        DataSource = dsEnvio
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
      end
      object dbtPM: TRLDBText
        Left = 511
        Top = 8
        Width = 15
        Height = 12
        DataField = 'PM'
        DataSource = dsEnvio
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object dbtPCom: TRLDBText
        Left = 541
        Top = 8
        Width = 25
        Height = 12
        Alignment = taRightJustify
        DataField = 'PCom'
        DataSource = dsEnvio
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object dbtBCalc: TRLDBText
        Left = 589
        Top = 8
        Width = 30
        Height = 12
        Alignment = taRightJustify
        DataField = 'BCalc'
        DataSource = dsEnvio
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object dbtValor: TRLDBText
        Left = 645
        Top = 8
        Width = 30
        Height = 12
        Alignment = taRightJustify
        DataField = 'Valor'
        DataSource = dsEnvio
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object dbtStatus: TRLDBText
        Left = 682
        Top = 8
        Width = 35
        Height = 12
        DataField = 'Status'
        DataSource = dsEnvio
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -9
        Font.Name = 'Courier New'
        Font.Style = [fsBold]
        ParentFont = False
      end
    end
    object RLBand4: TRLBand
      Left = 38
      Top = 38
      Width = 718
      Height = 27
      BandType = btHeader
      Borders.Sides = sdCustom
      Borders.DrawLeft = False
      Borders.DrawTop = False
      Borders.DrawRight = False
      Borders.DrawBottom = True
      object RLLabel17: TRLLabel
        Left = 6
        Top = 8
        Width = 140
        Height = 14
        Caption = 'Automa'#231#227'o Comercial'
      end
      object lblEmpresa: TRLLabel
        Left = 633
        Top = 8
        Width = 77
        Height = 14
        Alignment = taRightJustify
      end
    end
    object RLBand1: TRLBand
      Left = 38
      Top = 65
      Width = 718
      Height = 104
      BandType = btHeader
      Borders.Sides = sdCustom
      Borders.DrawLeft = False
      Borders.DrawTop = False
      Borders.DrawRight = False
      Borders.DrawBottom = True
      Borders.FixedBottom = True
      object RLLabel1: TRLLabel
        Left = 259
        Top = 23
        Width = 199
        Height = 19
        Caption = 'Extrato do Representante'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblRepresentante: TRLLabel
        Left = 307
        Top = 43
        Width = 106
        Height = 18
        Alignment = taCenter
        Caption = 'Representante'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object RLSystemInfo1: TRLSystemInfo
        Left = 117
        Top = 83
        Width = 49
        Height = 14
      end
      object RLLabel9: TRLLabel
        Left = 0
        Top = 83
        Width = 119
        Height = 14
        Caption = 'Data de Emiss'#227'o:'
      end
      object RLSystemInfo2: TRLSystemInfo
        Left = 679
        Top = 82
        Width = 91
        Height = 14
        Info = itPageNumber
      end
      object RLLabel10: TRLLabel
        Left = 656
        Top = 82
        Width = 28
        Height = 14
        Caption = 'Pg.'
      end
      object lblPeriodo: TRLLabel
        Left = 320
        Top = 63
        Width = 78
        Height = 14
        Alignment = taCenter
      end
    end
  end
  object pnlRepres: TPanel [5]
    Left = 556
    Top = 103
    Width = 449
    Height = 196
    BevelInner = bvLowered
    BorderWidth = 1
    Color = clGray
    TabOrder = 5
    Visible = False
    object Label10: TLabel
      Left = 8
      Top = 12
      Width = 241
      Height = 19
      Caption = 'Enviar para os Representantes:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWhite
      Font.Height = -16
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsUnderline]
      ParentFont = False
    end
    object btnEnviar: TBitBtn
      Left = 364
      Top = 10
      Width = 75
      Height = 25
      Caption = 'Enviar'
      TabOrder = 0
      OnClick = btnEnviarClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333333333333333333FFFFFFFFFFFFFFF000000000000
        000077777777777777770FFFFFFFFFFFFFF07F3333FFF33333370FFFF777FFFF
        FFF07F333777333333370FFFFFFFFFFFFFF07F3333FFFFFF33370FFFF777777F
        FFF07F33377777733FF70FFFFFFFFFFF99907F3FFF33333377770F777FFFFFFF
        9CA07F77733333337F370FFFFFFFFFFF9A907FFFFFFFFFFF7FF7000000000000
        0000777777777777777733333333333333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
    end
    object cklRepres: TCheckListBox
      Left = 3
      Top = 56
      Width = 443
      Height = 137
      Align = alBottom
      BevelKind = bkFlat
      BorderStyle = bsNone
      Color = 16056319
      Columns = 2
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      HeaderBackgroundColor = 16056319
      ItemHeight = 12
      ParentFont = False
      TabOrder = 1
    end
    object ckbMarcarTds: TCheckBox
      Left = 6
      Top = 37
      Width = 97
      Height = 17
      Caption = 'Marcar Todos'
      TabOrder = 2
      OnClick = ckbMarcarTdsClick
    end
    object btnFecha: TBitBtn
      Left = 284
      Top = 10
      Width = 75
      Height = 25
      Caption = 'Fechar'
      TabOrder = 3
      OnClick = btnFechaClick
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777788
        F8F878F7777777777333333F00004444400777FFF444447777777777F333FF7F
        000033334D5008FFF4333377777777773337777F0000333345D50FFFF4333333
        337F777F3337F33F000033334D5D0FFFF43333333377877F3337F33F00003333
        45D50FEFE4333333337F787F3337F33F000033334D5D0FFFF43333333377877F
        3337F33F0000333345D50FEFE4333333337F787F3337F33F000033334D5D0FFF
        F43333333377877F3337F33F0000333345D50FEFE4333333337F787F3337F33F
        000033334D5D0EFEF43333333377877F3337F33F0000333345D50FEFE4333333
        337F787F3337F33F000033334D5D0EFEF43333333377877F3337F33F00003333
        4444444444333333337F7F7FFFF7F33F00003333333333333333333333777777
        7777333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
        333333333333777777F3333F00003333330000003333333333337FFFF7F3333F
        0000}
      NumGlyphs = 2
    end
  end
  inherited Timer1: TTimer
    Left = 508
    Top = 4
  end
  inherited RDP: TRDprint
    OnNewPage = RDPNewPage
    Left = 539
    Top = 4
  end
  object cds: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 472
    Top = 8
    object cdsseq: TStringField
      FieldName = 'seq'
    end
    object cdsempresa: TStringField
      FieldName = 'empresa'
      Size = 3
    end
    object cdsdata: TDateField
      FieldName = 'data'
    end
    object cdstipo: TStringField
      FieldName = 'tipo'
    end
    object cdsHistorico: TStringField
      FieldName = 'Historico'
      Size = 40
    end
    object cdsserie: TStringField
      FieldName = 'serie'
      Size = 3
    end
    object cdsnota: TStringField
      FieldName = 'nota'
      Size = 30
    end
    object cdsentidade: TStringField
      FieldName = 'entidade'
      Size = 5
    end
    object cdspedido: TStringField
      FieldName = 'pedido'
      Size = 9
    end
    object cdspedrep: TStringField
      FieldName = 'pedrep'
      Size = 9
    end
    object cdspm: TFloatField
      FieldName = 'pm'
    end
    object cdscomissao: TFloatField
      FieldName = 'comissao'
    end
    object cdsbase: TFloatField
      FieldName = 'base'
    end
    object cdsvalor: TFloatField
      FieldName = 'valor'
    end
    object cdsstatus: TStringField
      FieldName = 'status'
      Size = 15
    end
    object cdsrepresentatnte: TStringField
      FieldName = 'representatnte'
      Size = 3
    end
    object cdshistorico2: TStringField
      FieldName = 'historico2'
      Size = 40
    end
    object cdstitulo: TStringField
      FieldName = 'titulo'
      Size = 15
    end
    object cdsdevolucao: TFloatField
      FieldName = 'devolucao'
    end
    object cdsdebitoper: TFloatField
      FieldName = 'debitoper'
    end
    object cdsfrete: TFloatField
      FieldName = 'frete'
    end
    object cdsdev: TBooleanField
      FieldName = 'dev'
    end
    object cdscomisspaga: TFloatField
      FieldName = 'comisspaga'
    end
    object cdsCancelada: TBooleanField
      FieldName = 'Cancelada'
    end
    object cdschave: TStringField
      FieldName = 'chave'
    end
  end
  object CDSEmp: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 240
    Top = 84
    object CDSEmpEmpresa: TStringField
      FieldName = 'Empresa'
    end
    object CDSEmpValor: TFloatField
      FieldName = 'Valor'
    end
    object CDSEmpComiss: TFloatField
      FieldName = 'Comiss'
    end
  end
  object cdsEnvio: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 24
    Top = 218
    object cdsEnvioRep: TStringField
      FieldName = 'Rep'
      Size = 3
    end
    object cdsEnvioTipo: TStringField
      FieldName = 'Tipo'
      Size = 1
    end
    object cdsEnvioSeq: TStringField
      FieldName = 'Seq'
      Size = 2
    end
    object cdsEnvioEmp: TStringField
      FieldName = 'Emp'
      Size = 3
    end
    object cdsEnvioData: TStringField
      FieldName = 'Data'
      Size = 10
    end
    object cdsEnvioTp: TStringField
      FieldName = 'Tp'
      Size = 1
    end
    object cdsEnvioHist: TStringField
      FieldName = 'Hist'
      Size = 25
    end
    object cdsEnvioHist2: TStringField
      FieldName = 'Hist2'
      Size = 25
    end
    object cdsEnvioPed: TStringField
      FieldName = 'Ped'
      Size = 10
    end
    object cdsEnvioPedRep: TStringField
      FieldName = 'PedRep'
      Size = 10
    end
    object cdsEnvioPM: TStringField
      FieldName = 'PM'
      Size = 3
    end
    object cdsEnvioPCom: TStringField
      FieldName = 'PCom'
      Size = 10
    end
    object cdsEnvioBCalc: TStringField
      FieldName = 'BCalc'
      Size = 15
    end
    object cdsEnvioValor: TStringField
      FieldName = 'Valor'
      Size = 15
    end
    object cdsEnvioStatus: TStringField
      FieldName = 'Status'
      Size = 6
    end
  end
  object dsEnvio: TDataSource
    DataSet = cdsEnvio
    Left = 56
    Top = 218
  end
  object pdf: TRLPDFFilter
    DocumentInfo.Creator = 'FortesReport v3.23 \251 Copyright '#169' 1999-2004 Fortes Inform'#225'tica'
    ViewerOptions = []
    FontEncoding = feNoEncoding
    DisplayName = 'Documento PDF'
    Left = 88
    Top = 218
  end
  object cdsRep: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 24
    Top = 251
    object cdsReprep: TStringField
      FieldName = 'rep'
      Size = 3
    end
  end
  object IdMessage: TIdMessage
    AttachmentEncoding = 'MIME'
    BccList = <>
    CCList = <>
    Encoding = meMIME
    Recipients = <>
    ReplyTo = <>
    Left = 57
    Top = 251
  end
  object IdSMTP: TIdSMTP
    MaxLineAction = maException
    ReadTimeout = 0
    Port = 25
    AuthenticationType = atNone
    Left = 89
    Top = 251
  end
end
